%!TEX root = ../PTC-LibUG.tex
\makeusother

\chapter{PTC Geometry Tutorial Source File: \texttt{ptc\_geometry.f90}}
\label{app:geom.tutorial}

\index{PTC!source file}
\index{source file!geometry tutorial}
\index{geometry!tutorial source file}
\index{ptc\_geometry.f90@\ptc{ptc\_geometry.f90}!geometry tutorial source file}
%
This appendix contains the complete \Fninety\ listing for the
\PTC\ example \ptcprg{ptc_geometry}. Most of this example is
discussed in \TCref*{model.accel}. More advanced aspects of this
example are discussed in \TCref*{girders}.

\resetptclinenumber
\linenumberfrequency{5}
\setptclinenums{1}{5}

\inputptccode{code/geometry/ptc_geometry.f90}{\ptc{ptc_geometry.f90}}

\makeussubscript
\endinput
